home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 4 / FM Towns Free Software Collection 4 - Disc 1.iso / tugi / soft2.tug < prev    next >
Text File  |  1991-10-18  |  18KB  |  613 lines
  1. TUGi_macro(v1.0)
  2. {
  3.     Screen(3);
  4.     cls(1);
  5.     paletteset();
  6.     wind_init();
  7.     wrtstr(
  8.         "  フリコレ４収録グラフィックの後半を連続して"
  9.         "  表示していきます。"
  10.         "  マウスの操作等は一切有りません。"
  11.         "  全部の画像を表示し終える迄には、機種にもよりま"
  12.         "  が、多少のお時間が掛かります。"
  13.         "  マウスをクリックすると開始します。"
  14.         " "
  15.     );
  16.     mousewait();
  17.     wind_close();
  18.  
  19.  
  20.     Graph_wait(25);
  21.     Gscroll(0);
  22.  
  23.     Screen(3);
  24.     cls(1);
  25.     paletteset();
  26.     wind_init();
  27.     wrtstr(
  28.         "  パソコンクラブや出版社関連等からの提供された"
  29.         "  グラフィックを表示していきます。"
  30.         "  １３８個の画像ファイルが在ります。"
  31.         " "
  32.         "  これら画像を表示しますか？"
  33.         " "
  34.     );
  35.     wind_close();
  36.  
  37.     Question(
  38.         Graph_View(
  39.             Q:\CCPM\GRAPHICS\GAISEN_S.P25
  40.             Q:\CCPM\GRAPHICS\SURFER.P25
  41.             Q:\CCPM\GRAPHICS\AI_01.TIF
  42.             Q:\CCPM\GRAPHICS\AI_02.TIF
  43.             Q:\CCPM\GRAPHICS\AI_03.TIF
  44.             Q:\CCPM\GRAPHICS\AI_04.TIF
  45.             Q:\CCPM\GRAPHICS\AI_05.TIF
  46.             Q:\CCPM\GRAPHICS\AI_06.TIF
  47.             Q:\CCPM\GRAPHICS\AI_10.TIF
  48.             Q:\CCPM\GRAPHICS\ANGEL.TIF
  49.             Q:\CCPM\GRAPHICS\YUCCA_01.TIF
  50.             Q:\CCPM\GRAPHICS\YUCCA_02.TIF
  51.             Q:\CCPM\GRAPHICS\YUCCA_03.TIF
  52.             Q:\CCPM\GRAPHICS\AKIKO.TIF
  53.             Q:\KXC\TOWNS_OS\NRDB\BOX1.TK3
  54.             Q:\KXC\TOWNS_OS\NRDB\DA4.TK3
  55.             Q:\KXC\TOWNS_OS\NRDB\DX5.TK3
  56.             Q:\KXC\TOWNS_OS\NRDB\OTAMA.TK3
  57.             Q:\KXC\TOWNS_OS\NRDB\SANKAKU1.TK3
  58.             Q:\KXC\GRAPHICS\BEAR\NAO2.TK4
  59.             Q:\KXC\GRAPHICS\BEAR\NAO3.TK4
  60.             Q:\KXC\GRAPHICS\BEAR\BEAR1.TK4
  61.             Q:\KXC\GRAPHICS\BEAR\KAGAMI.TK4
  62.             Q:\KXC\GRAPHICS\BEAR\KAO.TK4
  63.             Q:\KXC\GRAPHICS\BEAR\KILLYOU.TK4
  64.             Q:\KXC\GRAPHICS\BEAR\NAO1.TK4
  65.             Q:\KXC\GRAPHICS\BEAR\OBJ.TK4
  66.             Q:\KXC\GRAPHICS\BEAR\BEAR6.TK4
  67.             Q:\KXC\GRAPHICS\ERIAS\MAHOU.P25
  68.             Q:\KXC\GRAPHICS\KGB_YAMA\Y_KGB_1.P25
  69.             Q:\KXC\GRAPHICS\KGB_YAMA\Y_KGB_2.P25
  70.             Q:\KXC\GRAPHICS\TK4_GRP\F1.TK4
  71.             Q:\KXC\GRAPHICS\TK4_GRP\F2.TK4
  72.             Q:\KXC\GRAPHICS\TK4_GRP\HARUKA.TK4
  73.             Q:\KXC\GRAPHICS\TK4_GRP\CRX_0102.TK4
  74.             Q:\KXC\GRAPHICS\TK4_GRP\CRX_1022.TK4
  75.             Q:\KXC\GRAPHICS\TK4_GRP\CRX_2303.TK4
  76.             Q:\KXC\GRAPHICS\TK4_GRP\Y_KGB_1.TK4
  77.             Q:\KXC\GRAPHICS\TK4_GRP\DX1.TK4
  78.             Q:\KXC\GRAPHICS\TK4_GRP\DX2.TK4
  79.             Q:\KXC\GRAPHICS\TK4_GRP\DX3.TK4
  80.             Q:\KXC\GRAPHICS\TK4_GRP\DX4.TK4
  81.             Q:\KXC\GRAPHICS\TK4_GRP\RAY1DN.TK4
  82.             Q:\KXC\GRAPHICS\TK4_GRP\RAY2DN.TK4
  83.             Q:\KXC\GRAPHICS\RX7\GRASS.TK4
  84.             Q:\KXC\GRAPHICS\AKI\NP1.TK4
  85.             Q:\KXC\GRAPHICS\AKI\NP2.TK4
  86.             Q:\KXC\GRAPHICS\AKI\P1.TK4
  87.             Q:\KXC\GRAPHICS\AKI\P2.TK4
  88.             Q:\KXC\GRAPHICS\AKI\P3.TK4
  89.             Q:\KXC\GRAPHICS\AKI\G1.TK4
  90.             Q:\KXC\GRAPHICS\AKI\G2.TK4
  91.             Q:\KXC\GRAPHICS\AKI\G3.TK4
  92.             Q:\KXC\GRAPHICS\AKI\TOWNS.TK4
  93.             Q:\KXC\GRAPHICS\AKI\P01.TK4
  94.             Q:\KXC\GRAPHICS\AKI\P02.TK4
  95.             Q:\KXC\GRAPHICS\AKI\P03.TK4
  96.             Q:\KXC\GRAPHICS\AKI\P04.TK4
  97.             Q:\KXC\GRAPHICS\AKI2\N5.GIF
  98.             Q:\KXC\GRAPHICS\AKI2\N6.GIF
  99.             Q:\KXC\GRAPHICS\AKI2\N2.TK4
  100.             Q:\KXC\GRAPHICS\AKI2\N4.TK4
  101.             Q:\KXC\GRAPHICS\AKI2\N3.TK4
  102.             Q:\KXC\GRAPHICS\AKI2\N1.TK4
  103.             Q:\CFC\GEARWARE\CHAKASHI\0.TIF
  104.             Q:\CFC\GEARWARE\CHAKASHI\1.TIF
  105.             Q:\CFC\GEARWARE\CHAKASHI\2.TIF
  106.             Q:\CFC\GEARWARE\CHAKASHI\3.TIF
  107.             Q:\CFC\GEARWARE\CHAKASHI\4.TIF
  108.             Q:\CFC\GEARWARE\CHAKASHI\5.TIF
  109.             Q:\CFC\GEARWARE\CHAKASHI\6.TIF
  110.             Q:\CFC\GEARWARE\CHAKASHI\7.TIF
  111.             Q:\CFC\GEARWARE\CHAKASHI\8.TIF
  112.             Q:\CFC\GEARWARE\CHAKASHI\9.TIF
  113.             Q:\CFC\GEARWARE\CHAKASHI\CHAKASHI.TIF
  114.             Q:\CFC\GEARWARE\CHAKASHI\CHEK_A.TIF
  115.             Q:\CFC\GEARWARE\CHAKASHI\CHEK_B.TIF
  116.             Q:\CFC\GEARWARE\CHAKASHI\CHEK_C.TIF
  117.             Q:\CFC\GEARWARE\CHAKASHI\CHEK_D.TIF
  118.             Q:\CFC\GEARWARE\CHAKASHI\CHEK_E.TIF
  119.             Q:\CFC\GEARWARE\CHAKASHI\CONTENTS.TIF
  120.             Q:\CFC\GEARWARE\CHAKASHI\DUMMY.TIF
  121.             Q:\CFC\GEARWARE\CHAKASHI\KEISAN.TIF
  122.             Q:\CFC\GEARWARE\CHAKASHI\TITLE.TIF
  123.             Q:\CFC\GEARWARE\CHAKASHI\ZUBARI.TIF
  124.             Q:\FAIRY_N\CG\BUCHI\BU16.PIC
  125.             Q:\FAIRY_N\CG\BUCHI\BU17.PIC
  126.             Q:\FAIRY_N\CG\BUCHI\BU18.PIC
  127.             Q:\FAIRY_N\CG\BUCHI\BU19.PIC
  128.             Q:\FAIRY_N\CG\BUCHI\BU20.PIC
  129.             Q:\FAIRY_N\CG\MAITAN\MAI16A.TIF
  130.             Q:\FAIRY_N\CG\MAITAN\MAI256A.TIF
  131.             Q:\FAIRY_N\CG\OSAWA\KAZUKI4M.TIF
  132.             Q:\FAIRY_N\CG\OSAWA\KAZUKI6.TIF
  133.             Q:\FAIRY_N\CG\THARA\TNEKO3.TIF
  134.             Q:\FAIRY_N\CG\THARA\FM.PIC
  135.             Q:\EASTRAY\SAMPLE\TEST256_.TIF
  136.             Q:\EASTRAY\SAMPLE\E_MARK.TIF
  137.             Q:\EASTRAY\SAMPLE\STONE1_.TIF
  138.             Q:\EASTRAY\SAMPLE\HAMON2.TIF
  139.             Q:\EASTRAY\DEKIAGA\FR.TIF
  140.             Q:\EASTRAY\DEKIAGA\BALL3.TIF
  141.             Q:\EASTRAY\DEKIAGA\COLOR0.TIF
  142.             Q:\EASTRAY\DEKIAGA\HAMON.TIF
  143.             Q:\EASTRAY\DEKIAGA\MARK.TIF
  144.             Q:\EASTRAY\DEKIAGA\CUBE.TIF
  145.             Q:\EASTRAY\DEMO\BALL2.TIF
  146.             Q:\EASTRAY\DEMO\BALL4.TIF
  147.             Q:\EASTRAY\DEMO\COLOR0.TIF
  148.             Q:\EASTRAY\DEMO\COLOR1.TIF
  149.             Q:\EASTRAY\DEMO\COLOR2.TIF
  150.             Q:\EASTRAY\DEMO\COLOR3.TIF
  151.             Q:\EASTRAY\DEMO\COLOR6.TIF
  152.             Q:\EASTRAY\DEMO\DATA3.TIF
  153.             Q:\EASTRAY\DEMO\DATA5_.TIF
  154.             Q:\EASTRAY\DEMO\PLANET_C.GIF
  155.             Q:\EASTRAY\DEMO\FR_C.GIF
  156.             Q:\EASTRAY\DEMO\FPICS.GIF
  157.             Q:\EASTRAY\DEMO\FPICS2.GIF
  158.             Q:\EASTRAY\DEMO\MAP0.TIF
  159.             Q:\EASTRAY\DEMO\MAP1.TIF
  160.             Q:\EASTRAY\DEMO\MAP21.TIF
  161.             Q:\EASTRAY\DEMO\BALL3_2.GIF
  162.             Q:\EASTRAY\DEMO\TOUMEI_C.GIF
  163.             Q:\EASTRAY\DEMO\SAM10.TIF
  164.             Q:\EASTRAY\DEMO\SAM11.TIF
  165.             Q:\EASTRAY\DEMO\SAM13.TIF
  166.             Q:\EASTRAY\DEMO\SAM9.TIF
  167.             Q:\EASTRAY\DEMO\TEST10.TIF
  168.             Q:\LC\GAMEN.TIF
  169.             Q:\LC\GAMENX.TIF
  170.             Q:\LC\HLP.TIF
  171.             Q:\OH_TOWNS\HYOUSHI\F03.TIF
  172.             Q:\OH_TOWNS\HYOUSHI\F01.TIF
  173.             Q:\OH_TOWNS\HYOUSHI\F02.TIF
  174.             Q:\OH_TOWNS\HYOUSHI\F10.TIF
  175.             Q:\OH_TOWNS\HYOUSHI\F11.TIF
  176.             Q:\OH_TOWNS\HYOUSHI\F12.TIF
  177.         );
  178.     );
  179.  
  180.     Graph_wait(25);
  181.     Gscroll(0);
  182.  
  183.     Screen(3);
  184.     cls(1);
  185.     paletteset();
  186.     wind_init();
  187.     wrtstr(
  188.         "  ＤＡＴＡディレクトリィ下に有るグラフィックの"
  189.         "  前半を表示していきます。"
  190.         "  ６７個の画像ファイルが在ります。"
  191.         " "
  192.         "  これら画像を表示しますか？"
  193.         " "
  194.     );
  195.     wind_close();
  196.  
  197.     Question(
  198.         Graph_View(
  199.             Q:\DATA\LUFO\COSMOS.TK4
  200.             Q:\DATA\LUFO\FRE_HAND.TK4
  201.             Q:\DATA\LUFO\KANASI_1.TK4
  202.             Q:\DATA\LUFO\KANASI_2.TK4
  203.             Q:\DATA\LUFO\KASAIM_1.TK4
  204.             Q:\DATA\LUFO\KASAIM_2.TK4
  205.             Q:\DATA\LUFO\MAJO.TK4
  206.             Q:\DATA\LUFO\NIGHT_S.TK4
  207.             Q:\DATA\LUFO\NJACK_1.TK4
  208.             Q:\DATA\LUFO\NO_UNDO.TK4
  209.             Q:\DATA\LUFO\OMEGA.TK4
  210.             Q:\DATA\LUFO\OYTS_1.TK4
  211.             Q:\DATA\LUFO\P_FORM_1.TK4
  212.             Q:\DATA\LUFO\P_FORM_2.TK4
  213.             Q:\DATA\LUFO\RPG_1.TK4
  214.             Q:\DATA\LUFO\SAKURA.TK4
  215.             Q:\DATA\LUFO\TOWNS
  216.             Q:\DATA\LUFO\2H.TK4
  217.             Q:\DATA\LUFO\ADM_1.TK4
  218.             Q:\DATA\LUFO\ADM_2.TK4
  219.             Q:\DATA\LUFO\BR_1.TK4
  220.             Q:\DATA\LUFO\BR_2.TK4
  221.             Q:\DATA\LUFO\ELF91_1.TK4
  222.             Q:\DATA\LUFO\ELF91_2.TK4
  223.             Q:\DATA\LUFO\ELF91_3.TK4
  224.             Q:\DATA\LUFO\ELF91_4.TK4
  225.             Q:\DATA\LUFO\ELF91_5.TK4
  226.             Q:\DATA\LUFO\FF91_1.TK4
  227.             Q:\DATA\LUFO\FF91_2.TK4
  228.             Q:\DATA\LUFO\H90.TK4
  229.             Q:\DATA\LUFO\NINJA91.TK4
  230.             Q:\DATA\LUFO\TYPE2.TK4
  231.             Q:\DATA\TOWNS05\TOWNS05.TK4
  232.             Q:\DATA\TOWNS04\TOWNS04.TK4
  233.             Q:\DATA\FWINDOW\FWINDOW1.TK4
  234.             Q:\DATA\F15E\F15E1.TK4
  235.             Q:\DATA\TYRRELL\TYRRELL1.TK4
  236.             Q:\DATA\MCLAREN2\MCLAREN2.TK4
  237.             Q:\DATA\MCLAREN1\MCLAREN1.TK4
  238.             Q:\DATA\ABURNER\ABURNER1.TK4
  239.             Q:\DATA\NEWTOWNS\TOWNSMX2.TK4
  240.             Q:\DATA\HIROGRAP\HIRO4.TK4
  241.             Q:\DATA\HIROGRAP\HIRO3.TK4
  242.             Q:\DATA\HIROGRAP\HIRO5.TK4
  243.             Q:\DATA\HIROGRAP\HIRO7.TK4
  244.             Q:\DATA\HIROGRAP\HIRO8.TK4
  245.             Q:\DATA\HIROGRAP\HIRO9.TK4
  246.             Q:\DATA\HIROGRAP\IKINUKI1.TK4
  247.             Q:\DATA\HIROGRAP\IKINUKI2.TK4
  248.             Q:\DATA\HIROGRAP\IKINUKI4.TK4
  249.             Q:\DATA\HIROGRAP\IKINUKI5.TK4
  250.             Q:\DATA\HIROGRAP\IKINUKI6.P16
  251.             Q:\DATA\HIROGRAP\IKINUKI7.TK4
  252.             Q:\DATA\HIROGRAP\IKINUKI8.TK4
  253.             Q:\DATA\HIROGRAP\IKI8_TMP.TK4
  254.             Q:\DATA\HIROGRAP\HILLTOP.TK4
  255.             Q:\DATA\HIROGRAP\DARK.TK4
  256.             Q:\DATA\HIROGRAP\IKI4_TMP.TK4
  257.             Q:\DATA\HIROGRAP\IKI5_TMP.TK4
  258.             Q:\DATA\HEINZ00A\HEINZ00A.TIF
  259.             Q:\DATA\SAVER\COACMA.PIC
  260.             Q:\DATA\SAVER\DAIGAK.PIC
  261.             Q:\DATA\SAVER\LIVE.PIC
  262.             Q:\DATA\SAVER\MAHOU.PIC
  263.             Q:\DATA\SAVER\M_GIRL.PIC
  264.             Q:\DATA\SAVER\T_WORLD.PIC
  265.         );
  266.     );
  267.  
  268.     Graph_wait(20);
  269.     Gscroll(0);
  270.  
  271.     Screen(3);
  272.     cls(1);
  273.     paletteset();
  274.     wind_init();
  275.     wrtstr(
  276.         "  ＤＡＴＡディレクトリィ下に有るグラフィックの"
  277.         "  後半を表示していきます。"
  278.         "  １４７個の画像ファイルが在ります。"
  279.         " "
  280.         "  これら画像を表示しますか？"
  281.         " "
  282.     );
  283.     wind_close();
  284.  
  285.     Question(
  286.         Graph_View(
  287.             Q:\DATA\TAKAO\F5.TIF
  288.             Q:\DATA\TAKAO\F7.TIF
  289.             Q:\DATA\TAKAO\F9.TIF
  290.             Q:\DATA\TAKAO\F11.TIF
  291.             Q:\DATA\TAKAO\F3.TIF
  292.             Q:\DATA\TAKAO\F4.TIF
  293.             Q:\DATA\TAKAO\F6.TIF
  294.             Q:\DATA\TAKAO\F8.TIF
  295.             Q:\DATA\SYM_SD\SYM_SD1.TIF
  296.             Q:\DATA\SYM_SD\SYM_SD2.TIF
  297.             Q:\DATA\SYM_SD\SYM_SD3.TIF
  298.             Q:\DATA\SYM_SD\SYM_SD4.TIF
  299.             Q:\DATA\DMMAP\DMMAP1.TIF
  300.             Q:\DATA\RINGO\IM005.TIF
  301.             Q:\DATA\RINGO\IM006.TIF
  302.             Q:\DATA\SUZUKEN\MONO.TIF
  303.             Q:\DATA\SUZUKEN\SUZU00.TIF
  304.             Q:\DATA\TRAU\TRAU.TIF
  305.             Q:\DATA\AYAGRAPH\TRAU_16.TIF
  306.             Q:\DATA\AYAGRAPH\HANA.TIF
  307.             Q:\DATA\AYAGRAPH\HANA2.TIF
  308.             Q:\DATA\ORA_TIF\ORA_2.TIF
  309.             Q:\DATA\ORA_TIF\ORA_3.TIF
  310.             Q:\DATA\ORA_TIF\ORA_4.TIF
  311.             Q:\DATA\ORA_TIF\ORA_7.TIF
  312.             Q:\DATA\ORA_TIF\ORA_8.TIF
  313.             Q:\DATA\ORA_TIF\ORA_5.TIF
  314.             Q:\DATA\PI_NO_E\PI9_8.TIF
  315.             Q:\DATA\PI_NO_E\PI9_9.TIF
  316.             Q:\DATA\PI_NO_E\PI0_0.TIF
  317.             Q:\DATA\PI_NO_E\PI1_1.TIF
  318.             Q:\DATA\PI_NO_E\PI2_1.TIF
  319.             Q:\DATA\PI_NO_E\PI2_2.TIF
  320.             Q:\DATA\PI_NO_E\PI2_3.TIF
  321.             Q:\DATA\PI_NO_E\PI3_1.TIF
  322.             Q:\DATA\PI_NO_E\PI4_1.TIF
  323.             Q:\DATA\PI_NO_E\PI4_2.TIF
  324.             Q:\DATA\PI_NO_E\PI4_3.TIF
  325.             Q:\DATA\PI_NO_E\PI5_1.TIF
  326.             Q:\DATA\PI_NO_E\PI6_1.TIF
  327.             Q:\DATA\PI_NO_E\PI6_2.TIF
  328.             Q:\DATA\PI_NO_E\PI7_1.TIF
  329.             Q:\DATA\PI_NO_E\PI7_2.TIF
  330.             Q:\DATA\PI_NO_E\PI7_3.TIF
  331.             Q:\DATA\PI_NO_E\PI8_1.TIF
  332.             Q:\DATA\PI_NO_E\PI8_2.TIF
  333.             Q:\DATA\PI_NO_E\PI9_1.TIF
  334.             Q:\DATA\PI_NO_E\PI9_2.TIF
  335.             Q:\DATA\PI_NO_E\PI9_3.TIF
  336.             Q:\DATA\PI_NO_E\PI9_4.TIF
  337.             Q:\DATA\PI_NO_E\PI9_5.TIF
  338.             Q:\DATA\PI_NO_E\PI9_6.TIF
  339.             Q:\DATA\PI_NO_E\PI9_7.TIF
  340.             Q:\DATA\GIRU\MERMAID.TIF
  341.             Q:\DATA\GIRU\MERMAID2.TIF
  342.             Q:\DATA\GIRU\FLOWER.TIF
  343.             Q:\DATA\GIRU\HABITAT.TIF
  344.             Q:\DATA\TAKI_C_1\DODO.TIF
  345.             Q:\DATA\TAKI_C_1\SUMMER.TIF
  346.             Q:\DATA\TAKI_C_1\KENKEN.TIF
  347.             Q:\DATA\TAKI_C_1\KENKEN2.TIF
  348.             Q:\DATA\CHO\CHO.TIF
  349.             Q:\DATA\TAKUMA\HYPER.TIF
  350.             Q:\DATA\TAKUMA\CD_ROM.TIF
  351.             Q:\DATA\TAKUMA\DARK_J.TIF
  352.             Q:\DATA\TAKUMA\STAND.TIF
  353.             Q:\DATA\TAKUMA\FRACTAL.TIF
  354.             Q:\DATA\TAKUMA\MUSIC.TIF
  355.             Q:\DATA\TAKUMA\MUSIC_DX.TIF
  356.             Q:\DATA\TAKUMA\BALL.TIF
  357.             Q:\DATA\UMA_PHOT\BIRD_01.TIF
  358.             Q:\DATA\UMA_PHOT\BIRD_03.TIF
  359.             Q:\DATA\UMA_PHOT\BIRD_04.TIF
  360.             Q:\DATA\UMA_PHOT\D51498M.TIF
  361.             Q:\DATA\UMA_PHOT\HANA_01.TIF
  362.             Q:\DATA\UMA_RAY\DIAMOND3.TIF
  363.             Q:\DATA\UMA_RAY\DIAMOND2.TIF
  364.             Q:\DATA\UMA_RAY\DIAMOND4.TIF
  365.             Q:\DATA\UMA_RAY\DIAMOND1.TIF
  366.             Q:\DATA\UMA_RAY\GRASS01.TIF
  367.             Q:\DATA\UMA_RAY\GRASS02.TIF
  368.             Q:\DATA\UMA_RAY\GRASS04.TIF
  369.             Q:\DATA\UMA_RAY\GRASS03.TIF
  370.             Q:\DATA\BUD\BUD_A.TIF
  371.             Q:\DATA\BUD\BUD_B.TIF
  372.             Q:\DATA\BUD\BUD_C.TIF
  373.             Q:\DATA\CHINAMON\SRTCG03.TIF
  374.             Q:\DATA\CHINAMON\SRTCG04.TIF
  375.             Q:\DATA\SOUJIRO\KOU.P16
  376.             Q:\DATA\SOUJIRO\KAN.P16
  377.             Q:\DATA\SOUJIRO\SYOKATU.P16
  378.             Q:\DATA\SOUJIRO\TYOU.TIF
  379.             Q:\DATA\SOUJIRO\HOU.P16
  380.             Q:\DATA\WHIPSJC3\WHIPS3.TIF
  381.             Q:\DATA\WHIPSJC2\WHIPS2.TIF
  382.             Q:\DATA\WHIPSJC4\WHIPS4.TIF
  383.             Q:\DATA\SMOKE\SMOKE.P25
  384.             Q:\DATA\T_MAN\T_MAN.P25
  385.             Q:\DATA\T_MANC\T_MANC.P25
  386.             Q:\DATA\BSG4T\BSG4T.P32
  387.             Q:\DATA\BSG7T\BSG7T.TIF
  388.             Q:\DATA\BSG9T\BSG9T.TIF
  389.             Q:\DATA\TESTCASE\DRS_0001.TIF
  390.             Q:\DATA\TESTCASE\DRS_0003.TIF
  391.             Q:\DATA\TESTCASE\DRS_0002.TIF
  392.             Q:\DATA\TESTCASE\DRS_0004.TIF
  393.             Q:\DATA\TESTCASE\DRS_0005.TIF
  394.             Q:\DATA\TESTCASE\DRS_0006.TIF
  395.             Q:\DATA\TESTCASE\DRS_0007.TIF
  396.             Q:\DATA\TESTCASE\DRS_0008.TIF
  397.             Q:\DATA\TESTCASE\DRS_0009.TIF
  398.             Q:\DATA\TESTCASE\DRS_0010.TIF
  399.             Q:\DATA\TESTCASE\DRS_0011.TIF
  400.             Q:\DATA\TESTCASE\DRS_0012.TIF
  401.             Q:\DATA\TESTCASE\DRS_0013.TIF
  402.             Q:\DATA\TESTCASE\DRS_0014.TIF
  403.             Q:\DATA\TESTCASE\DRS_0015.TIF
  404.             Q:\DATA\TESTCASE\DRS_0016.TIF
  405.             Q:\DATA\TESTCASE\DRS_0017.TIF
  406.             Q:\DATA\IMAGE\DRW_01.TIF
  407.             Q:\DATA\IMAGE\DRW_02.TIF
  408.             Q:\DATA\IMAGE\DRW_03.TIF
  409.             Q:\DATA\IMAGE\DRW_04.TIF
  410.             Q:\DATA\IMAGE\DRW_05.TIF
  411.             Q:\DATA\IMAGE\DRW_06.TIF
  412.             Q:\DATA\IMAGE\DRW_07.TIF
  413.             Q:\DATA\IMAGE\DRW_08.TIF
  414.             Q:\DATA\IMAGE\DRW_09.TIF
  415.             Q:\DATA\IMAGE\DRW_10.TIF
  416.             Q:\DATA\ASFCG\YUKI.TIF
  417.             Q:\DATA\ASFCG\YUKI2.TIF
  418.             Q:\DATA\ASFCG\LOGHOUSE.TIF
  419.             Q:\DATA\KISARAGI\TIFF\KISARAGI.TIF
  420.             Q:\DATA\KISARAGI\TIFF\ROSE.TIF
  421.             Q:\DATA\KISARAGI\TIFF\SWORD.TIF
  422.             Q:\DATA\KISARAGI\TIFF\SWORD_1.TIF
  423.             Q:\DATA\MMS\MYROOM\MYROOM.TIF
  424.             Q:\DATA\MMS\SEPIA\SEPIA.TIF
  425.             Q:\DATA\KOOLA\KOOL.TIF
  426.             Q:\DATA\KOOLB\WAHAHHA.TIF
  427.             Q:\DATA\DRASPI\DRA_1.TIF
  428.             Q:\DATA\DRASPI\DRA_2.TIF
  429.             Q:\DATA\DRASPI\DRA_3.TIF
  430.             Q:\DATA\DRASPI\DRA_4.TIF
  431.             Q:\DATA\DRASPI\DRA_5.TIF
  432.             Q:\DATA\DRASPI\DRA_6.TIF
  433.             Q:\DATA\DRASPI\DRA_7.TIF
  434.         );
  435.     );
  436.  
  437.  
  438.     Graph_wait(15);
  439.     Gscroll(0);
  440.  
  441.     Screen(3);
  442.     cls(1);
  443.     paletteset();
  444.     wind_init();
  445.     wrtstr(
  446.         "  ＣＨＩＨＩＲＯディレクトリィ下に有るグラフィック"
  447.         "  を表示していきます。"
  448.         "  １３４個の画像ファイルが在ります。"
  449.         " "
  450.         "  これら画像を表示しますか？"
  451.         " "
  452.     );
  453.     wind_close();
  454.  
  455.     Question(
  456.         Graph_View(
  457.             Q:\CHIHIRO\256MODE\MARIKO_P\MARIKO_P.TIF
  458.             Q:\CHIHIRO\256MODE\MARIKO\MARIKO.TIF
  459.             Q:\CHIHIRO\256MODE\KINUKO_P\KINUKO_P.TIF
  460.             Q:\CHIHIRO\256MODE\RICHIKO\RICHIKO.TIF
  461.             Q:\CHIHIRO\256MODE\RICHIK_P\RICHIK_P.TIF
  462.             Q:\CHIHIRO\256MODE\MASAKO\MASAKO.TIF
  463.             Q:\CHIHIRO\256MODE\MASAKO_P\MASAKO_P.TIF
  464.             Q:\CHIHIRO\256MODE\YUKO\YUKO.TIF
  465.             Q:\CHIHIRO\256MODE\YUKO_P\YUKO_P.TIF
  466.             Q:\CHIHIRO\256MODE\SYOKO_P\SYOKO_P.TIF
  467.             Q:\CHIHIRO\256MODE\CHIEKO\CHIEKO.TIF
  468.             Q:\CHIHIRO\256MODE\KATSUKO\KATSUKO.TIF
  469.             Q:\CHIHIRO\256MODE\SATOKO\SATOKO.TIF
  470.             Q:\CHIHIRO\256MODE\SATOKO_P\SATOKO_P.TIF
  471.             Q:\CHIHIRO\256MODE\JINKO\JINKO.TIF
  472.             Q:\CHIHIRO\256MODE\MACHIKO\MACHIKO.TIF
  473.             Q:\CHIHIRO\256MODE\YUKIKO\YUKIKO.TIF
  474.             Q:\CHIHIRO\256MODE\NAOKO\NAOKO.TIF
  475.             Q:\CHIHIRO\256MODE\NAMIKO\NAMIKO.TIF
  476.             Q:\CHIHIRO\256MODE\MAKIKO\MAKIKO.TIF
  477.             Q:\CHIHIRO\256MODE\MAKIKO_P\MAKIKO_P.TIF
  478.             Q:\CHIHIRO\256MODE\WAKAKO\WAKAKO.TIF
  479.             Q:\CHIHIRO\256MODE\YOSHIKO\YOSHIKO.TIF
  480.             Q:\CHIHIRO\256MODE\MAYUKO\MAYUKO.TIF
  481.             Q:\CHIHIRO\256MODE\AKIKO\AKIKO.TIF
  482.             Q:\CHIHIRO\256MODE\KINUKOKINUKO.TIF
  483.             Q:\CHIHIRO\32KMODE\KEIKO_P\KEIKO_P.TIF
  484.             Q:\CHIHIRO\32KMODE\MICHIK_P\MICHIK_P.TIF
  485.             Q:\CHIHIRO\32KMODE\EMIKO\EMIKO.TIF
  486.             Q:\CHIHIRO\32KMODE\AIKO\AIKO.TIF
  487.             Q:\CHIHIRO\32KMODE\HIDEKO\HIDEKO.TIF
  488.             Q:\CHIHIRO\32KMODE\HIDEKO_P\HIDEKO_P.TIF
  489.             Q:\CHIHIRO\32KMODE\HISAKO\HISAKO.TIF
  490.             Q:\CHIHIRO\32KMODE\KEIKO\KEIKO.TIF
  491.             Q:\CHIHIRO\32KMODE\YOKO\YOKO.TIF
  492.             Q:\CHIHIRO\32KMODE\KAYOKO\KAYOKO.TIF
  493.             Q:\CHIHIRO\32KMODE\MIHOKO\MIHOKO.TIF
  494.             Q:\CHIHIRO\32KMODE\MICHIKO\MICHIKO.TIF
  495.             Q:\CHIHIRO\32KMODE\NORIKO\NORIKO.TIF
  496.             Q:\CHIHIRO\32KMODE\EMIKO_P\EMIKO_P.TIF
  497.             Q:\CHIHIRO\32KMODE\RYOKO\RYOKO.TIF
  498.             Q:\CHIHIRO\32KMODE\ATSUKO2\ATSUKO2.TIF
  499.             Q:\CHIHIRO\32KMODE\CHIZUKOCHIZUKO.TIF
  500.             Q:\CHIHIRO\16_MODE\WAKAKO_P\WAKAKO_P.TIF
  501.             Q:\CHIHIRO\16_MODE\YUMIKO\YUMIKO.TIF
  502.             Q:\CHIHIRO\16_MODE\KUMIKO\KUMIKO.TIF
  503.             Q:\CHIHIRO\16_MODE\KUMIKO_P\KUMIKO_P.TIF
  504.             Q:\CHIHIRO\16_MODE\YUMIKO_P\YUMIKO_P.TIF
  505.             Q:\CHIHIRO\16_MODE\ATSUKO\ATSUKO.TIF
  506.             Q:\CHIHIRO\16_MODE\TAKAKO\TAKAKO.TIF
  507.             Q:\CHIHIRO\16_MODE\SHIZUK_P\SHIZUK_P.TIF
  508.             Q:\CHIHIRO\16_MODE\YURIKO\YURIKO.TIF
  509.             Q:\CHIHIRO\16_MODE\SHIZUKO\SHIZUKO.TIF
  510.             Q:\CHIHIRO\ANIME\TAKAKO.TIF
  511.             Q:\CHIHIRO\ANIME\TOMOKO1.TIF
  512.             Q:\CHIHIRO\ANIME\TOMOKO10.TIF
  513.             Q:\CHIHIRO\ANIME\TOMOKO11.TIF
  514.             Q:\CHIHIRO\ANIME\TOMOKO12.TIF
  515.             Q:\CHIHIRO\ANIME\TOMOKO13.TIF
  516.             Q:\CHIHIRO\ANIME\TOMOKO14.TIF
  517.             Q:\CHIHIRO\ANIME\TOMOKO15.TIF
  518.             Q:\CHIHIRO\ANIME\TOMOKO16.TIF
  519.             Q:\CHIHIRO\ANIME\TOMOKO17.TIF
  520.             Q:\CHIHIRO\ANIME\TOMOKO18.TIF
  521.             Q:\CHIHIRO\ANIME\TOMOKO19.TIF
  522.             Q:\CHIHIRO\ANIME\TOMOKO2.TIF
  523.             Q:\CHIHIRO\ANIME\TOMOKO20.TIF
  524.             Q:\CHIHIRO\ANIME\TOMOKO21.TIF
  525.             Q:\CHIHIRO\ANIME\TOMOKO22.TIF
  526.             Q:\CHIHIRO\ANIME\TOMOKO23.TIF
  527.             Q:\CHIHIRO\ANIME\TOMOKO24.TIF
  528.             Q:\CHIHIRO\ANIME\TOMOKO25.TIF
  529.             Q:\CHIHIRO\ANIME\TOMOKO26.TIF
  530.             Q:\CHIHIRO\ANIME\TOMOKO27.TIF
  531.             Q:\CHIHIRO\ANIME\TOMOKO28.TIF
  532.             Q:\CHIHIRO\ANIME\TOMOKO29.TIF
  533.             Q:\CHIHIRO\ANIME\TOMOKO3.TIF
  534.             Q:\CHIHIRO\ANIME\TOMOKO30.TIF
  535.             Q:\CHIHIRO\ANIME\TOMOKO31.TIF
  536.             Q:\CHIHIRO\ANIME\TOMOKO32.TIF
  537.             Q:\CHIHIRO\ANIME\TOMOKO33.TIF
  538.             Q:\CHIHIRO\ANIME\TOMOKO34.TIF
  539.             Q:\CHIHIRO\ANIME\TOMOKO4.TIF
  540.             Q:\CHIHIRO\ANIME\TOMOKO5.TIF
  541.             Q:\CHIHIRO\ANIME\TOMOKO6.TIF
  542.             Q:\CHIHIRO\ANIME\TOMOKO7.TIF
  543.             Q:\CHIHIRO\ANIME\TOMOKO8.TIF
  544.             Q:\CHIHIRO\ANIME\TOMOKO80.TIF
  545.             Q:\CHIHIRO\ANIME\TOMOKO9.TIF
  546.             Q:\CHIHIRO\ANIME2\RYOKO07.TIF
  547.             Q:\CHIHIRO\ANIME2\RYOKO06.TIF
  548.             Q:\CHIHIRO\ANIME2\RYOKO05.TIF
  549.             Q:\CHIHIRO\ANIME2\RYOKO04.TIF
  550.             Q:\CHIHIRO\ANIME2\RYOKO03.TIF
  551.             Q:\CHIHIRO\ANIME2\RYOKO02.TIF
  552.             Q:\CHIHIRO\ANIME2\RYOKO01.TIF
  553.             Q:\CHIHIRO\ANIME2\RYOKO00.TIF
  554.             Q:\CHIHIRO\ANIME2\RYOKO14F.TIF
  555.             Q:\CHIHIRO\ANIME2\RYOKO14G.TIF
  556.             Q:\CHIHIRO\ANIME2\RYOKO22.TIF
  557.             Q:\CHIHIRO\ANIME2\RYOKO21.TIF
  558.             Q:\CHIHIRO\ANIME2\RYOKO23.TIF
  559.             Q:\CHIHIRO\ANIME2\RYOKO20.TIF
  560.             Q:\CHIHIRO\ANIME2\RYOKO14H.TIF
  561.             Q:\CHIHIRO\ANIME2\RYOKO19.TIF
  562.             Q:\CHIHIRO\ANIME2\RYOKO18.TIF
  563.             Q:\CHIHIRO\ANIME2\RYOKO17.TIF
  564.             Q:\CHIHIRO\ANIME2\RYOKO16.TIF
  565.             Q:\CHIHIRO\ANIME2\RYOKO15.TIF
  566.             Q:\CHIHIRO\ANIME2\RYOKO08.TIF
  567.             Q:\CHIHIRO\ANIME2\RYOKO09.TIF
  568.             Q:\CHIHIRO\ANIME2\RYOKO10.TIF
  569.             Q:\CHIHIRO\ANIME2\RYOKO11.TIF
  570.             Q:\CHIHIRO\ANIME2\RYOKO12.TIF
  571.             Q:\CHIHIRO\ANIME2\RYOKO13.TIF
  572.             Q:\CHIHIRO\ANIME2\RYOKO14.TIF
  573.             Q:\CHIHIRO\ANIME2\RYOKO09A.TIF
  574.             Q:\CHIHIRO\ANIME2\RYOKO10A.TIF
  575.             Q:\CHIHIRO\ANIME2\RYOKO11A.TIF
  576.             Q:\CHIHIRO\ANIME2\RYOKO08A.TIF
  577.             Q:\CHIHIRO\ANIME2\RYOKO12A.TIF
  578.             Q:\CHIHIRO\ANIME2\RYOKO14A.TIF
  579.             Q:\CHIHIRO\ANIME2\RYOKO10B.TIF
  580.             Q:\CHIHIRO\ANIME2\RYOKO14B.TIF
  581.             Q:\CHIHIRO\ANIME2\RYOKO09B.TIF
  582.             Q:\CHIHIRO\ANIME2\RYOKO14C.TIF
  583.             Q:\CHIHIRO\ANIME2\RYOKO14D.TIF
  584.             Q:\CHIHIRO\ANIME2\RYOKO14E.TIF
  585.             Q:\CHIHIRO\ANIME2\RYOKO14I.TIF
  586.             Q:\CHIHIRO\ANIME2\RYOKO14J.TIF
  587.             Q:\CHIHIRO\ANIME2\RYOKO24.TIF
  588.             Q:\CHIHIRO\ANIME2\RYOKO25.TIF
  589.             Q:\CHIHIRO\ANIME2\RYOKO26.TIF
  590.             Q:\CHIHIRO\ANIME2\RYOKO27.TIF
  591.         );
  592.     );
  593.     Graph_wait(0);
  594.     Gscroll(1);
  595.  
  596.     Screen(3);
  597.     cls(1);
  598.     paletteset();
  599.     wind_init();
  600.     wrtstr(
  601.         "  お疲れ様でした(^_^)"
  602.         " "
  603.         "  今度は特定の物をじっくり見てみませんか？"
  604.         " "
  605.         " "
  606.     );
  607.     wind_close();
  608.     Question(
  609.         MAIN2.TUG
  610.     );
  611.     END.TUG
  612. }
  613.